I've been working on a small compojure project for a while and I'm having 
trouble with displaying search results from a particular site, in my case 
rottentomatoes.
Thing is, my project works like a movie helper with a simple search and 
managing SQL database, like a watchlist.

Since I've tried numerous ways to make this work, I'm hoping someone here 
could help me out on this.
This is how the homepage looks like:

 (defn view-input [] 
    (view-layout 
     
   [:h2 "Find your Movie"] 
    [:body {:style "font: 14pt/16pt helvetica; background-color: #F2FB78; 
padding-top:100px; text-align: center"  }
   (form-to [:post "/"]
      [:br]  [:br]
     (text-field {:placeholder "Enter movie name" } :a) [:br] 
      (submit-button "Search")
                 )]))

Here I create url, using "a" as variable from placeholder "Enter movie name"

(defn create-flick-url [a]   
  (str "http://www.rottentomatoes.com/search/?search=" a ""))

And this should be Search Result page, but it only returns h2 title and no 
results:
(defn view-output2 [a]    
  (view-layout
    [:h2 "Search results"]
    [:body {:style "font: 14pt/16pt helvetica; background-color: #F2FB78; 
padding-top:100px; text-align: center"  }
    [:form {:method "post" :action "/"}               
      (interleave
        (for [flick (flick-vec a)]        
        (label :flick_name (:name flick))) 
        (for [flick-name (flick-vec a)][:br])
        (for [flick-image (flick-vec a)]
           [:img {:id "img_movie" :src (:image flick-image)}])      
        
        (for [flick-read-link (flick-vec a)]
          (link-to (:read-link flick-read-link) "Read it here!"))
        
        (for [flick (flick-vec a)]
        [:br]))]]))

flick-vec is a function that makes a map from parsed segments of the 
rottentomatoes site:
(defn flick-vec [a]
           (vec (let [flick-url (create-flick-url a)
                     flick-names (print-flick-name-content flick-url)]
                     (mapper-gen3 flick-names
                     (get-image-content flick-url) 
     (get-all-reading-links flick-url)
   ))) )
Whereas mapper-gen3 makes a map from 3 parameters:
(defn mapper-gen3
  [names images read-link] (sort-by :name (map #(hash-map :name %1 :image 
%2 :read-link %3) names images read-link )))

And this is the PageParser.clj part where I define functions used in 
flick-vec:
  (def url "http://www.rottentomatoes.com/")
  
  (defn get-page
  "Gets the html page from passed url"
  [url]
  (html/html-resource (java.net.URL. url))[:h3 :span :a])

  
(defn name+search
  "This function returns a sequence of h2 tags,where a.main is parsed from 
movieweb"
  [url]
  (html/select (get-page url) 
             [:h3 (html/attr= :class "nomargin"):a]))     

 
(defn image+search
  "Function that returns a sequence of tags, where img is image parsed from 
movieweb"
  [url]
  (html/select (get-page url) 
             [:span (html/attr= :class "movieposter"):a]))    
    

(defn print-flick-name-content
  [url]
  (vec (flatten (map :content (name+search url)))))

(defn get-image-content
  [url]
  (vec (flatten (map #(re-find #"http.*jpg" %) (map :style (map :attrs 
(image+search url)))))))

Anyway, I'll include whole files here, but I listed functions that I use 
the most and with whom I'm having the most trouble with. I'm just trying to 
get search results from rottentomatoes,after typing into placeholder, to 
look like this:

["movie name"] ["movie image"]
["link to movie review"]
...
...
...and so on
Or anything like that. Thanks everyone in advance!